home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / ab20 / ab20_archive / languages / assembly / powervisor_113.lzh / s / pv / ExtraAliases < prev    next >
Text File  |  1991-09-15  |  185b  |  8 lines
  1. ;Define a new command to compute the facultaty of its argument
  2. ;Usage :
  3. ;    < fact 5
  4. ;    > 00000078 , 120
  5.  
  6. alias _fact 'void if(([])==1,1,{_fact ([])-1}*([]))'
  7. alias fact 'disp {_fact []}'
  8.